home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / bitblt1 / modbitbl.bas < prev    next >
BASIC Source File  |  1999-09-02  |  2KB  |  49 lines

  1. Attribute VB_Name = "modBITBLT"
  2. Option Explicit
  3. Declare Function BitBlt Lib "gdi32" ( _
  4.     ByVal hDestDC As Long, _
  5.     ByVal X As Long, _
  6.     ByVal Y As Long, _
  7.     ByVal nWidth As Long, _
  8.     ByVal nHeight As Long, _
  9.     ByVal hSrcDC As Long, _
  10.     ByVal xSrc As Long, _
  11.     ByVal ySrc As Long, _
  12.     ByVal dwRop As Long _
  13.     ) As Long
  14. '
  15. ' ================================
  16. ' PARAMETERS AND THEIR DESCRIPTION
  17. ' ================================
  18. ' ByVal hDestDC As Long ..... hDC of object to receive the .bmp
  19. ' ByVal x As Long ........... x coordinate (upper-left) destination rectangle
  20. ' ByVal y As Long ........... y coordinate (upper-left) destination rectangle
  21. ' ByVal nWidth As Long ...... width of the destination rect. and source .bmp
  22. ' ByVal nHeight As Long ..... height of the destination rect. and source .bmp
  23. ' ByVal hSrcDC As Long ...... hDC of source object that contains the .bmp
  24. ' ByVal xSrc As Long ........ x coordinate (upper-left) source .bmp
  25. ' ByVal ySrc As Long ........ y coordinate (upper-left) source .bmp
  26. ' ByVal dwRop As Long ....... specifies the raster operation to be performed as below
  27. '
  28. ' ===========================================================
  29. ' RASTER OPERATION CONSTANTS
  30. ' ===========================================================
  31. '
  32. ' Constants  ------------------     Description
  33. ' ===========================================================
  34. '
  35. Public Const SRCCOPY = &HCC0020     'Copies the source bitmap to destination bitmap.
  36. Public Const SRCAND = &H8800C6      'Combines pixels of the destination with source bitmap
  37.                                     'using the Boolean AND operator.
  38. Public Const SRCINVERT = &H660046   'Combines pixels of the destination with source bitmap
  39.                                     'using the Boolean XOR operator.
  40. Public Const SRCPAINT = &HEE0086    'Combines pixels of the destination with source bitmap
  41.                                     'using the Boolean OR operator.
  42. Public Const SRCERASE = &H4400328   'Inverts the destination bitmap and then combines the
  43.                                     'results with the source bitmap using the Boolean AND
  44.                                     'operator.
  45. Public Const WHITENESS = &HFF0062   'Turns all output white.
  46. Public Const BLACKNESS = &H42       'Turn output black.
  47.  
  48.  
  49.